home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 November / macformat-018.iso / Utility Spectacular / Developer / read⁄write ressource ƒ / Read⁄write ressource osax 1.0 < prev   
Encoding:
Text File  |  1994-01-01  |  3.1 KB  |  67 lines  |  [TEXT/ttxt]
  1. PAUTEX jf
  2. 14, av Milton NANCY 
  3. tel 83.40.36.80  ------------------------------------- Club dev. de NANCY  1993
  4.  
  5. Extension Applescript   ShareWare 50FF       Read resource 1.0
  6. Pour lire et manipuler des ressources dans un fichier, c'est une methode rapide et plus puissante que ResEdit pour transferer des data dans les ressources.
  7. Tous les transferts sont possibles en lecture en écriture. Les infos d'un fichier
  8. sont modifiables  par 'write info'. le createur ou/et la signature.
  9.  
  10. ------------- f est un alias sur un fichier --------------------------------------
  11. read resName of file "xxxx" type "TYPE"        - read all name of resource of type "TYPE"
  12. read resID of f type "CODE"                           - read all ID of some resource
  13. read resType of file "fichier"                                          - read all type in a file
  14. read resource of f type "TEXT"    id XX                   - read content of a resource 
  15. read creator of f                                             - read creator of a file
  16. read fileType of f                                            - read file type 
  17.  
  18. Ecriture de resources dans un fichier et des infos du fichier :
  19. write resource data in f  type "TYPE" id ref
  20. write info of f creator "xxxx" type "abcd"      - set info for a file 
  21. ------------------------------------------------------------------------------
  22. Si le fichier n'existe pas creation par defaut d'un fichier ResEdit :
  23. write resource data in file "nouveau" type "TYPE" id ref filetype "file" creator "xxxx"
  24.  
  25. exemple :
  26. set fiche to find document name "SoundEdit™ Pro"
  27. read resource of fiche type "TEXT" id (read resID of fiche type "TEXT")
  28. write resource "salut" in file "LCII:fichier"  type "TEXT" id 1
  29.  
  30. Pour obtenir les ressources de Teachtext
  31.    set x to find document name "TeachText" of type "APPL" in disk "LCII"
  32.    read resType of x
  33.  
  34. nous donne comme resultats  la liste suivante :
  35. {"hdlg", "hmnu", "vers", "SIZE", "ics4", "ics8", "icl4", "icl8", "ics#", "ICN#", "FREF", "BNDL", "ttxt", "PAT#", "WIND", "ALRT", "cicn", "ICON", "DITL", "DLOG", "dctb", "STR#", "MENU", "CODE"}
  36.  
  37. Lecture de la version de teachText
  38.    set x to find document name "TeachText" of type "APPL" in disk "LCII"
  39.    read resource of x type "vers" id 1
  40.  
  41. donne :
  42. "ÄF2-7.0(F2-7.0, © Apple Computer, Inc. 1985-1991"
  43.  
  44. Le passage dans une variable Applescript permet le transfert dans une autre ressource
  45. ou dans un text directement par la fonction "write data" par exemple.
  46.  
  47. Transfert d'un texte teachText dans une ressource de type TEXT id = 1 :
  48.    set texte to read data of (find document name "nom texte")
  49.    write resource texte in "disque:fichier"  type "TEXT" id 1
  50. -----------------------------------------------------------------------------
  51. Bonne utilisation A bientôt  jf
  52.  
  53. Autres OSAX par Pautex jf
  54. - save/read data                  lecture/ecriture de fichier dans une variable.
  55. - find document                    recherche rapide de documents suivant type, date...
  56. - play sound                         joue un son dans un fichier
  57.  
  58.  
  59. Merci de régler le shareware de 50 FF merci.
  60. -----------------------------------------------------------------------------
  61. Contact PAUTEX jf
  62. 14, av Milton 54000 nancy    
  63. >>>>>>>> e-mail pautex@lpmi.u-nancy.fr <<<<<<<<<
  64.  
  65.  
  66. ...
  67.